home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / langs / prolog68.zoo / prolog.68 / codes / debugger.wam < prev    next >
Encoding:
Text File  |  1994-06-03  |  20.0 KB  |  346 lines
  1. Debugger
  2. p'db_ancestors'/2 240 528 236 28 12 532 18 8 64 176 'user_output' 515 p'nl'/1
  3. 534 96 290 512 20 276 82 'goal'/2 273 272 1 -16 176 'user_output' 177 '    ('
  4. 127 2048 -12 516 212 176 'user_output' 145 -4 516 212 176 'user_output'
  5. 177 ') ' 516 212 144 -8 514 p'db_print_goal'/1 8 176 'user_output' 514 p'nl'/1
  6. 0 545 -4 538 36 385 480 0 484 548 -4 144 -12 177 0 3 514 p'db_ancestors'/2
  7. 0 519 60 539 40 385 480 1 488 548 -4 385 480 1 501 433 144 -12 514 p'db_ancestors'/2
  8. 0 519 18 540 176 'user_output' 514 p'nl'/1 0 513 24 518 520
  9.  
  10. p'db_blanks'/2 108 512 20 0 -20 1 -16 544 -8 127 2048 -12 127 2048 -4 538
  11. 58 144 -20 161 -4 20 146 -12 514 p'C'/3 0 384 480 32 487 548 -8 160 -12
  12. 20 145 -16 514 p'db_blanks'/2 0 519 16 540 144 -20 145 -16 516 128 513 32
  13. 518
  14.  
  15. p'db_box'/4 296 528 292 292 256 532 184 16 48 't' 512 20 1 -20 2 -16 3 -12
  16. 112 -8 127 2048 -4 516 32 176 0 3 145 -20 146 -16 147 -12 514 p'db_port'/4
  17. 0 144 -20 145 -4 514 p'db_clause'/2 0 160 -4 20 211 'goal'/2 340 339 225
  18. 323 338 162 -8 20 514 p'db_c'/3 8 538 6 519 32 540 176 0 19 145 -12 146
  19. -8 147 -4 514 p'db_port'/4 0 520 176 0 11 145 -12 146 -8 147 -4 513 24 515
  20. p'db_port'/4 534 48 'f' 512 12 1 -12 2 -8 3 -4 128 516 32 176 0 27 145 -12
  21. 146 -8 147 -4 514 p'db_port'/4 12 520 513 12 518 529 24 [ 'f' -66 't' -248]
  22. 520
  23.  
  24. p'db_c'/3 624 528 544 404 466 532 14 12 48 'true' 547 518 533 12 48 'otherwise'
  25. 547 518 533 14 48 'fail' 547 520 518 533 14 48 'false' 547 520 518 533 64
  26. 512 12 1 -8 2 -4 80 ','/2 288 274 547 145 -8 146 -4 514 p'db_c'/3 0 144
  27. -12 145 -8 146 -4 513 24 515 p'db_c'/3 533 100 80 ';'/2 512 20 272 276 1
  28. -16 2 -12 547 112 -8 516 32 538 30 144 -4 145 -16 146 -12 147 -8 514 p'db_i'/4
  29. 0 519 30 540 144 -20 145 -16 146 -12 163 -8 20 514 p'db_d'/4 0 513 32 518
  30. 533 68 80 '->'/2 512 20 276 275 1 -12 2 -8 547 112 -4 516 32 208 '->'/2
  31. 308 307 145 -12 146 -8 163 -4 20 513 32 515 p'db_i'/4 533 76 80 '\\+'/1
  32. 512 12 273 1 -4 547 112 -12 516 32 538 38 144 -8 145 -4 146 -12 514 p'db_c'/3
  33. 0 160 -12 12 516 36 520 519 4 540 513 24 518 533 16 48 '!' 242 0 517 36
  34. 534 512 12 0 -12 1 -8 112 -4 514 p'db_next_id'/1 0 210 'db_restart'/4 288
  35. 338 336 337 209 'db_box'/4 257 338 336 337 513 24 515 p'if_exception'/3
  36. 535 4 12 537 -70 529 56 [ '!' -92 'fail' -440 'false' -424 'otherwise' -454
  37. 'true' -468] 535 4 12 537 -148 530 56 [ ','/2 -486 '->'/2 -318 ';'/2 -420
  38. '\\+'/1 -248]
  39.  
  40. p'db_check_port'/4 116 528 112 112 76 532 16 16 48 0 11 35 8 518 533 22
  41. 48 0 19 50 0 339 51 0 339 518 534 48 0 27 51 0 499 241 8 176 '$debugger_skip_id'
  42. 517 296 529 24 [ 1 -68 2 -52 3 -30] 520
  43.  
  44. p'db_clause'/2 94 532 60 8 512 12 0 -12 1 -8 544 -4 144 -12 177 'interpreted'
  45. 514 p'predicate_property'/2 0 548 -4 144 -12 145 -8 513 24 515 p'clause'/2
  46. 534 512 4 0 -4 49 'true' 516 60 144 -4 513 16 523 0
  47.  
  48. p'db_cmd'/6 250 532 132 24 512 36 0 -32 1 -28 2 -24 3 -20 5 -12 544 -36
  49. 244 0 113 -4 127 2048 -16 127 2048 -8 514 p'db_blanks'/2 0 160 -4 36 145
  50. -16 146 -8 514 p'C'/3 4 160 -12 32 145 -28 146 -24 147 -20 148 -16 165 -4
  51. 32 150 -8 514 p'db_cmd'/7 28 548 -4 513 16 518 533 46 51 'go' 512 4 544
  52. -4 244 0 245 4 514 p'db_blanks'/2 0 548 -4 513 16 515 p'trace' 534 51 'stay'
  53. 512 8 4 -8 5 -4 176 '!?   ERROR : Illegal debugger command.' 514 p'message'/1
  54. 0 176 'user_error' 177 '!?   ------- ' 516 212 144 -8 145 -4 513 20 515
  55. p'db_skip_command'/2
  56.  
  57. p'db_cmd'/7 1256 528 1252 1252 992 532 82 28 48 0 347 52 'stay' 38 20 241
  58. 0 512 12 113 -8 114 -4 127 2048 -12 516 388 144 -12 161 -8 12 162 -4 12
  59. 516 388 160 -12 12 513 24 515 p'db_spy'/1 533 80 48 0 363 52 'stay' 38 20
  60. 241 0 512 12 113 -8 114 -4 127 2048 -12 516 388 144 -12 161 -8 12 162 -4
  61. 12 516 388 160 -12 12 513 24 515 p'db_nospy'/1 533 72 48 0 371 52 'stay'
  62. 38 20 241 0 512 8 113 -8 114 -4 516 388 176 'user_output' 514 p'nl'/1 0
  63. 208 '/'/2 337 336 513 20 515 p'listing'/1 533 26 48 0 475 52 'redo' 245
  64. 0 246 4 517 128 533 54 48 0 483 52 'stay' 245 4 246 8 512 4 112 -4 514 p'db_number'/3
  65. 0 160 -4 4 513 16 515 p'db_set_print_depth'/1 533 24 48 0 491 52 'stay'
  66. 38 20 515 p'debugging' 533 24 48 0 507 52 'stay' 38 20 515 p'db_help' 533
  67. 24 48 0 515 52 'stay' 38 20 515 p'db_command' 533 22 48 0 779 52 'stay'
  68. 38 20 517 56 533 24 48 0 787 52 'stay' 38 20 515 p'break' 533 24 48 0 795
  69. 52 'go' 38 20 515 p'trace' 533 48 48 0 803 52 'stay' 38 20 176 'user_output'
  70. 512 0 516 228 176 'user_output' 513 12 515 p'nl'/1 533 54 48 0 819 52 'go'
  71. 245 4 246 8 512 4 112 -4 514 p'db_number'/3 0 208 '$db_fail'/1 336 513 16
  72. 517 28 533 62 48 0 827 512 8 3 -8 52 'stay' 245 4 246 8 112 -4 514 p'db_number'/3
  73. 0 144 -8 161 -4 8 513 20 515 p'db_ancestors'/2 533 24 48 0 835 52 'stay'
  74. 38 20 515 p'db_help' 533 24 48 0 867 52 'go' 38 20 515 p'debug' 533 24 48
  75. 0 883 52 'go' 38 20 515 p'nodebug' 533 50 48 0 899 52 'stay' 38 20 241 0
  76. 512 0 514 p'db_print_goal'/1 0 176 'user_output' 513 12 515 p'nl'/1 533
  77. 70 48 0 915 52 'go' 245 4 246 8 512 4 112 -4 514 p'db_number'/3 0 176 'user_output'
  78. 177 '[Debugger: retry goal]\n\n' 516 212 208 '$db_retry'/1 336 513 16 517
  79. 28 533 54 48 0 923 512 4 2 -4 52 'go' 38 20 514 p'db_skip' 0 176 '$debugger_skip_id'
  80. 129 146 -4 513 16 517 296 533 48 48 0 955 52 'stay' 38 20 176 'user_output'
  81. 512 0 516 212 176 'user_output' 513 12 515 p'nl'/1 534 48 0 963 52 'go'
  82. 38 20 176 'back_up' 515 p'db_unimp'/1 529 248 [ 43 -984 45 -902 46 -820
  83. 59 -746 60 -718 61 -662 63 -636 64 -610 97 -584 98 -560 99 -534 100 -508
  84. 102 -458 103 -402 104 -338 108 -312 110 -286 112 -260 114 -208 115 -136
  85. 119 -80 120 -32] 520
  86.  
  87. p'db_command' 66 512 8 112 -4 177 'Command :- ' 127 2048 -8 516 292 176
  88. 'user_input' 145 -8 516 196 128 161 -4 8 516 292 160 -8 8 513 20 515 p'once'/1
  89.  
  90. p'db_d'/4 114 528 6 106 106 532 96 16 80 ';'/2 512 20 272 276 1 -16 2 -12
  91. 3 -8 547 538 30 144 -4 145 -16 146 -12 147 -8 514 p'db_i'/4 0 519 28 540
  92. 144 -20 145 -16 146 -12 147 -8 514 p'db_d'/4 0 513 32 518 534 515 p'db_i'/4
  93.  
  94. p'db_digit'/3 46 512 4 0 -4 241 0 145 -4 514 p'C'/3 0 384 480 48 489 384
  95. 480 57 487 513 16 518
  96.  
  97. p'db_digits'/3 90 528 86 12 72 532 62 12 512 16 2 -12 96 288 275 544 -4
  98. 114 -8 514 p'db_digit'/3 0 548 -4 144 -16 161 -8 16 146 -12 513 28 515 p'db_digits'/3
  99. 534 64 241 0 242 4 517 128 520
  100.  
  101. p'db_getchars'/1 74 512 12 0 -12 112 -4 177 ' ? ' 127 2048 -8 516 292 176
  102. 'user_input' 145 -8 516 244 128 161 -4 12 516 292 160 -8 12 145 -12 513
  103. 24 515 p'db_getchars'/2
  104.  
  105. p'db_getchars'/2 72 528 26 26 6 532 16 8 48 0 83 65 547 518 534 97 352 512
  106. 8 273 176 'user_input' 113 -4 516 244 160 -4 8 145 -8 513 20 515 p'db_getchars'/2
  107.  
  108. p'db_help' 136 176 'user_output' 177 '\nDebugger commands:\n\n' 512 0 516
  109. 212 176 'user_output' 177 '    c, <CR>  creep      p      print        n  nodebug       ?, h  help\n'
  110. 516 212 176 'user_output' 177 '    l        leap       w      write        +  spy this      =     info\n'
  111. 516 212 176 'user_output' 177 '    s        skip       d      display      -  nospy this\n'
  112. 516 212 176 'user_output' 177 '    ;        redo       g [n]  ancestors    @  command\n'
  113. 516 212 176 'user_output' 177 '    r [id]   retry      < [n]  set depth    b  break\n'
  114. 516 212 176 'user_output' 177 '    f [id]   fail                           a  abort\n'
  115. 516 212 176 'user_output' 177 '    x        back up                        .  listing\n\n'
  116. 513 12 517 212
  117.  
  118. p'db_i'/4 134 532 124 16 512 28 0 -4 1 -28 2 -24 3 -16 544 -8 144 -4 127
  119. 2048 -20 127 2048 -12 516 644 144 -4 209 '->'/2 338 340 516 128 548 -8 160
  120. -12 28 145 -28 146 -16 514 p'db_c'/3 12 144 -4 516 36 160 -8 16 145 -16
  121. 146 -12 513 28 515 p'db_c'/3 534 515 p'db_c'/3
  122.  
  123. p'db_info'/1 182 528 178 178 110 532 26 4 48 0 3 176 'user_output' 177 'Debugger is inactive.'
  124. 517 212 533 24 48 0 11 176 'user_output' 177 'Debugger is creeping.' 517
  125. 212 533 24 48 0 19 176 'user_output' 177 'Debugger is leaping.' 517 212
  126. 534 48 0 27 176 'user_output' 177 'Debugger is skipping.' 517 212 529 56
  127. [ 0 -102 1 -76 2 -50 3 -26] 520
  128.  
  129. p'db_info'/3 356 528 114 114 6 532 104 12 48 0 123 512 8 1 -8 2 -4 547 176
  130. 'user_output' 177 'No ' 516 212 176 'user_output' 145 -4 516 212 176 'user_output'
  131. 177 ' ports - ' 516 212 176 'user_output' 145 -8 516 212 176 'user_output'
  132. 177 ' goals will not stop.' 513 20 517 212 534 512 20 0 -20 2 -4 176 'user_output'
  133. 127 2048 -16 127 2048 -12 127 2048 -8 516 212 176 'user_output' 177 ' goals will stop at '
  134. 516 212 176 'user_output' 145 -4 516 212 176 'user_output' 177 ' ports:'
  135. 516 212 144 -20 177 0 67 178 'call' 179 0 259 148 -8 514 p'db_info'/5 4
  136. 144 -16 177 0 35 178 'exit' 163 -4 16 148 -8 514 p'db_info'/5 4 144 -12
  137. 177 0 19 178 'redo' 163 -4 12 148 -8 514 p'db_info'/5 4 144 -8 177 0 11
  138. 178 'fail' 163 -4 8 132 514 p'db_info'/5 8 176 'user_output' 177 '.' 513
  139. 12 517 212
  140.  
  141. p'db_info'/5 114 512 24 0 -8 1 -4 2 -16 3 -24 4 -20 545 -12 538 64 385 384
  142. 506 480 0 484 548 -12 389 433 176 'user_output' 516 268 176 'user_output'
  143. 145 -16 516 212 144 -20 177 0 355 516 128 519 16 540 144 -20 145 -24 516
  144. 128 513 36 518
  145.  
  146. p'db_leashed_port'/3 106 528 102 102 66 532 30 12 48 0 259 401 480 32 402
  147. 510 506 480 0 484 518 534 48 0 339 401 480 512 402 510 506 480 0 484 518
  148. 529 24 [ 32 -58 42 -30] 520
  149.  
  150. p'db_next_id'/1 60 512 8 0 -8 176 '$debugger_counter' 113 -4 146 -4 516
  151. 296 384 480 1 500 449 176 '$debugger_counter' 161 -4 8 146 -8 513 20 517
  152. 296
  153.  
  154. p'db_nospy'/1 202 532 196 4 512 16 0 -4 144 -4 127 2048 -16 127 2048 -12
  155. 127 2048 -8 514 p'db_nospy_one'/1 0 144 -4 145 -16 162 -12 16 516 388 176
  156. 'user_error' 177 '[Spypoint removed for ' 516 212 545 -8 538 28 160 -16
  157. 16 145 -4 514 p'current_predicate'/2 0 548 -8 519 20 540 176 'user_error'
  158. 177 'undefined ' 516 212 176 'user_error' 177 'predicate ' 516 212 176 'user_error'
  159. 209 '/'/2 339 338 516 212 176 'user_error' 177 ']' 516 212 176 'user_error'
  160. 513 28 515 p'nl'/1 534 518
  161.  
  162. p'db_nospy_one'/1 102 512 12 0 -8 545 -4 127 2048 -12 538 52 144 -8 177
  163. 'builtin' 514 p'predicate_property'/2 0 548 -4 176 'type_error' 177 0 11
  164. 210 'nospy'/1 337 516 80 519 26 540 144 -8 145 -12 516 524 160 -12 12 516
  165. 72 513 24 518
  166.  
  167. p'db_number'/3 154 528 12 12 6 532 124 12 512 28 0 -28 2 -16 544 -8 241
  168. 0 113 -4 127 2048 -24 127 2048 -20 127 2048 -12 514 p'db_blanks'/2 0 160
  169. -24 28 161 -4 28 146 -12 514 p'db_digit'/3 4 548 -4 160 -16 24 161 -8 24
  170. 146 -12 514 p'db_digits'/3 12 144 -12 225 337 336 513 24 517 400 534 48
  171. 0 3 241 0 242 4 517 128
  172.  
  173. p'db_port'/2 150 528 146 146 78 532 18 8 48 0 3 49 ' Call: ' 518 533 16
  174. 48 0 11 49 ' Exit: ' 518 533 16 48 0 19 49 ' Redo: ' 518 534 48 0 27 49
  175. ' Fail: ' 518 529 56 [ 0 -70 1 -52 2 -34 3 -18] 520
  176.  
  177. p'db_port'/4 470 532 464 16 512 56 0 -28 1 -48 2 -44 3 -40 544 -52 176 '$debugger_mode'
  178. 113 -24 146 -24 127 2048 -56 127 2048 -36 127 2048 -32 127 2048 -20 127
  179. 2048 -16 127 2048 -12 127 2048 -8 127 2048 -4 516 296 545 -4 538 28 144
  180. -48 514 p'db_spied'/1 0 548 -4 480 42 452 519 10 540 480 32 452 389 480
  181. 3 506 432 145 -44 146 -20 163 -8 56 514 p'db_check_port'/4 4 144 -36 145
  182. -8 514 p'length'/2 0 144 -24 145 -12 514 p'db_port'/2 0 514 p'repeat' 0
  183. 387 433 176 'user_output' 516 268 384 433 176 'user_output' 516 268 176
  184. 'user_output' 177 ' (' 516 212 176 'user_output' 145 -40 516 212 176 'user_output'
  185. 177 ') ' 516 212 176 'user_output' 161 -8 52 516 212 176 'user_output' 161
  186. -12 52 516 212 144 -44 514 p'db_print_goal'/1 12 545 -16 538 78 160 -4 40
  187. 161 -8 40 146 -12 514 p'db_leashed_port'/3 0 548 -16 144 -20 514 p'db_getchars'/1
  188. 0 144 -32 145 -28 146 -24 147 -40 164 -20 40 197 514 p'db_cmd'/6 0 519 18
  189. 540 176 'user_output' 514 p'nl'/1 0 144 -40 177 'stay' 516 140 548 -36 160
  190. -40 40 177 'redo' 513 52 517 140 534 518
  191.  
  192. p'db_portctrl'/2 84 512 12 0 -8 1 -4 176 '$debugger_mode' 113 -12 146 -12
  193. 516 296 384 480 2 500 435 386 480 15 403 509 497 506 385 403 509 507 434
  194. 176 '$debugger_mode' 161 -12 12 513 24 517 296
  195.  
  196. p'db_portmask'/2 150 528 146 146 78 532 18 8 48 'call' 49 0 59 518 533 16
  197. 48 'exit' 49 0 91 518 533 16 48 'redo' 49 0 107 518 534 48 'fail' 49 0 115
  198. 518 529 56 [ 'call' -70 'exit' -52 'fail' -18 'redo' -34] 520
  199.  
  200. p'db_portmask'/3 82 528 78 12 70 532 60 12 512 16 1 -8 2 -12 96 288 275
  201. 113 -4 514 p'db_portmask'/2 0 385 384 506 433 144 -16 146 -12 513 28 515
  202. p'db_portmask'/3 534 64 34 4 518 520
  203.  
  204. p'db_pred_type'/1 82 528 78 78 42 532 12 4 48 'built_in' 518 533 10 48 'compiled'
  205. 518 534 48 'interpreted' 518 529 24 [ 'built_in' -34 'compiled' -22 'interpreted'
  206. -12] 520
  207.  
  208. p'db_pred_type'/2 46 512 8 1 -4 544 -8 145 -4 514 p'predicate_property'/2
  209. 0 144 -4 514 p'db_pred_type'/1 4 548 -4 513 16 518
  210.  
  211. p'db_print_goal'/1 216 512 24 0 -12 112 -24 127 2048 -20 127 2048 -16 127
  212. 2048 -8 127 2048 -4 516 356 176 'user_output' 516 348 545 -4 538 48 176
  213. '$db_print_depth' 145 -8 130 514 p'recorded'/3 0 548 -4 144 -12 161 -8 24
  214. 514 p'$print'/2 0 519 22 540 144 -12 177 0 83 514 p'$print'/2 0 144 -12
  215. 145 -20 514 p'db_pred_type'/2 12 545 -4 538 24 144 -8 177 'interpreted'
  216. 516 136 548 -4 519 34 540 176 ' (' 516 208 160 -8 12 516 208 176 0 331 516
  217. 264 160 -12 12 513 24 517 348
  218.  
  219. p'db_restart'/4 342 528 294 290 290 532 146 16 80 '$db_retry'/1 512 24 273
  220. 1 -24 2 -20 3 -16 544 -12 545 -4 538 18 385 480 0 484 548 -4 519 34 539
  221. 16 385 388 489 548 -4 519 16 540 208 '$db_retry'/1 305 516 28 548 -12 176
  222. '$debugger_counter' 129 146 -20 516 296 210 'db_restart'/4 288 341 340 339
  223. 209 'db_box'/4 257 341 340 339 513 36 515 p'if_exception'/3 533 132 80 '$db_fail'/1
  224. 512 24 273 1 -24 2 -20 3 -16 544 -12 545 -4 538 18 385 480 0 484 548 -4
  225. 519 34 539 16 385 388 489 548 -4 519 16 540 208 '$db_fail'/1 305 516 28
  226. 548 -12 210 'db_restart'/4 288 341 340 339 209 'db_box'/4 368 'f' 341 340
  227. 339 513 36 515 p'if_exception'/3 534 517 28 535 4 16 537 -12 530 24 [ '$db_fail'/1
  228. -150 '$db_retry'/1 -296]
  229.  
  230. p'db_set_print_depth'/1 82 512 12 0 -12 545 -4 127 2048 -8 538 40 176 '$db_print_depth'
  231. 129 146 -8 514 p'recorded'/3 0 548 -4 160 -8 12 516 636 519 4 540 176 '$db_print_depth'
  232. 145 -12 130 513 24 517 612
  233.  
  234. p'db_skip' 12 176 0 27 515 p'db_switch_mode'/1
  235.  
  236. p'db_skip_command'/2 120 512 16 0 -4 1 -16 127 2048 -12 127 2048 -8 538
  237. 32 144 -4 145 -16 516 128 176 'user_error' 514 p'nl'/1 0 519 58 540 144
  238. -4 161 -8 16 146 -12 514 p'C'/3 0 385 433 176 'user_error' 516 268 160 -12
  239. 16 145 -16 514 p'db_skip_command'/2 0 513 28 518
  240.  
  241. p'db_spied'/1 26 512 4 113 -4 516 524 160 -4 4 513 16 517 76
  242.  
  243. p'db_spy'/1 192 512 16 0 -4 144 -4 127 2048 -16 127 2048 -12 127 2048 -8
  244. 514 p'db_spy_one'/1 0 144 -4 145 -16 162 -12 16 516 388 176 'user_error'
  245. 177 '[Spypoint set on ' 516 212 545 -8 538 28 160 -16 16 145 -4 514 p'current_predicate'/2
  246. 0 548 -8 519 20 540 176 'user_error' 177 'undefined ' 516 212 176 'user_error'
  247. 177 'predicate ' 516 212 176 'user_error' 209 '/'/2 339 338 516 212 176
  248. 'user_error' 177 ']' 516 212 176 'user_error' 513 28 515 p'nl'/1
  249.  
  250. p'db_spy_one'/1 102 512 12 0 -8 545 -4 127 2048 -12 538 52 144 -8 177 'builtin'
  251. 514 p'predicate_property'/2 0 548 -4 176 'type_error' 177 0 11 210 'spy'/1
  252. 337 516 80 519 26 540 144 -8 145 -12 516 524 160 -12 12 516 68 513 24 518
  253.  
  254. p'db_switch_mode'/1 60 512 8 0 -4 176 '$debugger_mode' 113 -8 146 -8 516
  255. 296 385 480 1020 506 384 507 434 176 '$debugger_mode' 161 -8 8 513 20 517
  256. 296
  257.  
  258. p'db_unimp'/1 16 240 4 176 'Sorry, command not yet implemented: ' 515 p'message'/2
  259.  
  260. p'debug' 12 176 0 19 515 p'db_switch_mode'/1
  261.  
  262. p'debug_dynamic_call'/2 98 512 12 1 -8 176 '$debugger_counter' 113 -12 178
  263. 0 3 127 2048 -4 516 296 538 34 144 -4 516 32 144 -8 193 162 -4 12 514 p'db_c'/3
  264. 0 519 24 540 176 '$debugger_counter' 129 162 -12 12 516 296 520 513 24 518
  265.  
  266. p'debugging' 470 176 'user_output' 512 24 127 2048 -24 127 2048 -20 127
  267. 2048 -16 127 2048 -12 127 2048 -8 127 2048 -4 514 p'nl'/1 0 176 '$debugger_mode'
  268. 145 -4 162 -4 24 516 296 384 480 3 506 432 514 p'db_info'/1 0 176 'user_output'
  269. 514 p'nl'/1 0 384 480 2 510 480 15 506 432 177 'Normal' 178 'leashed' 514
  270. p'db_info'/3 0 176 'user_output' 514 p'nl'/1 0 384 480 6 510 480 15 506
  271. 432 177 'Spied' 178 'harnessed' 514 p'db_info'/3 4 176 'user_output' 514
  272. p'nl'/1 0 176 'user_output' 177 'Calls to undefined predicates will ' 516
  273. 212 176 'unknown' 145 -4 162 -4 20 516 296 545 -8 538 34 384 480 0 484 548
  274. -8 176 'user_output' 177 'fail.' 516 212 519 20 540 176 'user_output' 177
  275. 'be trapped.' 516 212 176 'user_output' 514 p'nl'/1 8 176 'user_output'
  276. 177 'Spypoints:' 516 212 176 'user_output' 514 p'nl'/1 0 538 106 128 145
  277. -4 514 p'current_predicate'/2 0 144 -4 514 p'db_spied'/1 0 160 -4 12 161
  278. -12 12 162 -8 12 516 388 177 0 75 176 'user_output' 516 268 176 'user_output'
  279. 209 '/'/2 338 337 516 212 176 'user_output' 514 p'nl'/1 0 520 519 4 540
  280. 176 'user_output' 513 24 515 p'nl'/1
  281.  
  282. p'harness'/1 320 528 300 300 6 532 56 4 512 8 0 -8 544 -4 144 -8 516 640
  283. 548 -4 176 'instantiation_error' 177 0 11 210 'harness'/1 337 513 20 517
  284. 80 533 122 512 12 0 -12 544 -4 144 -12 127 2048 -8 516 664 548 -4 545 -8
  285. 538 52 386 480 0 489 386 480 15 487 548 -8 386 497 480 15 506 432 177 0
  286. 35 514 p'db_portctrl'/2 0 519 28 540 176 'range_error' 177 0 11 210 'harness'/1
  287. 338 516 80 513 24 518 533 28 48 'all' 547 176 0 3 177 0 35 515 p'db_portctrl'/2
  288. 533 54 512 8 544 -4 177 0 123 114 -8 514 p'db_portmask'/3 0 548 -4 160 -8
  289. 8 177 0 35 513 20 515 p'db_portctrl'/2 534 210 'harness'/1 352 176 'type_error'
  290. 177 0 11 517 80 535 -294 4 536 -242 536 -92 537 -40
  291.  
  292. p'leash'/1 320 528 300 300 6 532 56 4 512 8 0 -8 544 -4 144 -8 516 640 548
  293. -4 176 'instantiation_error' 177 0 11 210 'leash'/1 337 513 20 517 80 533
  294. 122 512 12 0 -12 544 -4 144 -12 127 2048 -8 516 664 548 -4 545 -8 538 52
  295. 386 480 0 489 386 480 15 487 548 -8 386 497 480 15 506 432 177 0 3 514 p'db_portctrl'/2
  296. 0 519 28 540 176 'range_error' 177 0 11 210 'leash'/1 338 516 80 513 24
  297. 518 533 28 48 'all' 547 176 0 3 177 0 3 515 p'db_portctrl'/2 533 54 512
  298. 8 544 -4 177 0 123 114 -8 514 p'db_portmask'/3 0 548 -4 160 -8 8 177 0 3
  299. 513 20 515 p'db_portctrl'/2 534 210 'leash'/1 352 176 'type_error' 177 0
  300. 11 517 80 535 -294 4 536 -242 536 -92 537 -40
  301.  
  302. p'nodebug' 12 176 0 3 515 p'db_switch_mode'/1
  303.  
  304. p'nospy'/1 398 528 378 360 342 532 56 4 512 8 0 -8 544 -4 144 -8 516 640
  305. 548 -4 176 'instantiation_error' 177 0 11 210 'nospy'/1 337 513 20 517 80
  306. 533 86 80 '/'/2 512 16 274 273 544 -4 144 -12 127 2048 -16 516 668 144 -8
  307. 516 664 385 480 0 489 548 -4 144 -16 145 -12 146 -8 516 388 160 -16 16 513
  308. 28 515 p'db_nospy'/1 533 36 96 288 512 4 272 547 514 p'nospy'/1 0 144 -4
  309. 513 16 515 p'nospy'/1 533 8 64 547 518 533 114 512 12 0 -12 544 -4 144 -12
  310. 127 2048 -8 516 668 548 -4 545 -8 538 36 144 -12 129 514 p'current_predicate'/2
  311. 0 548 -8 144 -12 514 p'nospy_all'/1 0 519 36 540 176 '!?   ERROR : Can\'t remove spypoint for '
  312. 145 -12 514 p'message'/2 0 176 '!?   ------- (no predicates with that name)'
  313. 514 p'message'/1 0 513 24 518 534 210 'nospy'/1 352 176 'type_error' 177
  314. 0 11 517 80 535 -336 4 536 -158 536 -152 537 -40 535 -354 4 536 -214 536
  315. -170 537 -58 535 -372 4 536 -320 536 -188 537 -76
  316.  
  317. p'nospy_all'/1 48 532 42 4 512 4 113 -4 514 p'current_predicate'/2 0 160
  318. -4 4 514 p'db_nospy'/1 4 520 513 12 518 534 518
  319.  
  320. p'not_debugging'/1 80 512 8 0 -8 176 '$debugger_mode' 113 -4 162 -4 8 516
  321. 296 211 'prolog_flag'/3 368 '$debugger_mode' 257 336 210 ','/2 323 370 'signal_exception'/1
  322. 288 209 'not_debugging'/2 337 336 513 20 515 p'if_exception'/3
  323.  
  324. p'not_debugging'/2 88 532 56 8 512 8 0 -4 1 -8 514 p'nodebug' 0 144 -4 514
  325. p'once'/1 4 176 '$debugger_mode' 129 146 -4 513 16 517 296 534 241 8 176
  326. '$debugger_mode' 129 512 0 516 296 520 513 12 518
  327.  
  328. p'spy'/1 398 528 378 360 342 532 56 4 512 8 0 -8 544 -4 144 -8 516 640 548
  329. -4 176 'instantiation_error' 177 0 11 210 'spy'/1 337 513 20 517 80 533
  330. 86 80 '/'/2 512 16 274 273 544 -4 144 -12 127 2048 -16 516 668 144 -8 516
  331. 664 385 480 0 489 548 -4 144 -16 145 -12 146 -8 516 388 160 -16 16 513 28
  332. 515 p'db_spy'/1 533 36 96 288 512 4 272 547 514 p'spy'/1 0 144 -4 513 16
  333. 515 p'spy'/1 533 8 64 547 518 533 114 512 12 0 -12 544 -4 144 -12 127 2048
  334. -8 516 668 548 -4 545 -8 538 36 144 -12 129 514 p'current_predicate'/2 0
  335. 548 -8 144 -12 514 p'spy_all'/1 0 519 36 540 176 '!?   ERROR : Can\'t set spypoint on '
  336. 145 -12 514 p'message'/2 0 176 '!?   ------- (no predicates with that name)'
  337. 514 p'message'/1 0 513 24 518 534 210 'spy'/1 352 176 'type_error' 177 0
  338. 11 517 80 535 -336 4 536 -158 536 -152 537 -40 535 -354 4 536 -214 536 -170
  339. 537 -58 535 -372 4 536 -320 536 -188 537 -76
  340.  
  341. p'spy_all'/1 48 532 42 4 512 4 113 -4 514 p'current_predicate'/2 0 160 -4
  342. 4 514 p'db_spy'/1 4 520 513 12 518 534 518
  343.  
  344. p'trace' 12 176 0 11 515 p'db_switch_mode'/1
  345.  
  346.